home *** CD-ROM | disk | FTP | other *** search
/ PC World 2007 December / PCWorld_2007-12_cd.bin / domacnost a kancelar / autoit / autoit-v3-setup.exe / Examples / Helpfile / _GUICtrlTreeViewSetIcon.au3 < prev    next >
Text File  |  2007-09-08  |  1KB  |  42 lines
  1. #include <GUIConstantsEx.au3>
  2. #include <WindowsConstants.au3>
  3. #include <GuiTreeView.au3>
  4.  
  5. Opt("MustDeclareVars", 1)
  6.  
  7. Dim $h_GUI, $Msg, $treeview
  8. Dim $h_root1, $h_root2, $h_root3
  9. Dim $n_btn_seticon
  10.  
  11. $h_GUI = GUICreate("TreeView UDF Sample", 220, 340)
  12.  
  13. $treeview = GUICtrlCreateTreeView(10, 10, 200, 200, -1, $WS_EX_CLIENTEDGE)
  14. GUICtrlSetImage(-1, "shell32.dll", 3, 4)
  15. GUICtrlSetImage(-1, "shell32.dll", 4, 2)
  16.  
  17. $h_root1 = _GUICtrlTreeViewInsertItem($treeview, "RootItem1")
  18. _GUICtrlTreeViewSetIcon($treeview, $h_root1, "shell32.dll", 7)
  19.  
  20. $h_root2 = _GUICtrlTreeViewInsertItem($treeview, "RootItem2")
  21. _GUICtrlTreeViewSetIcon($treeview, $h_root2, "shell32.dll", 12)
  22.  
  23. $h_root3 = _GUICtrlTreeViewInsertItem($treeview, "RootItem3")
  24.  
  25. $n_btn_seticon = GUICtrlCreateButton("Set Random Icons", 10, 220, 200, 20)
  26.  
  27. GUISetState()
  28.  
  29. While 1
  30.     $Msg = GUIGetMsg()
  31.     Switch $Msg
  32.         Case $GUI_EVENT_CLOSE
  33.             ExitLoop
  34.             
  35.         Case $n_btn_seticon
  36.             _GUICtrlTreeViewSetIcon($treeview, $h_root1, "shell32.dll", Random(0, 50, 1))
  37.             _GUICtrlTreeViewSetIcon($treeview, $h_root2, "shell32.dll", Random(0, 50, 1))
  38.     EndSwitch
  39. WEnd
  40.  
  41. Exit
  42.